home *** CD-ROM | disk | FTP | other *** search
/ Programming Languages Suite / ProgramD2.iso / Languages / MS Cobol4.5 / INIT / BRIEF.INI next >
INI File  |  1990-06-01  |  10KB  |  525 lines
  1. [pwb brief b]
  2. ; TOOLS.INI file for BRIEF(tm) configuration
  3.  
  4. NotBrief:=arg "No equivalent in the Programmer's WorkBench" message
  5. ToolsIni:=arg "$INIT:tools.ini" setfile
  6.  
  7. ;
  8. ; GLOBAL CONFIGURATION
  9. ;
  10. autosave:no
  11. undocount:30
  12. autostart:=toggle_re
  13. vscroll:1
  14. nounixre:
  15. rmargin:70
  16. menukey:f9
  17.  
  18. ;
  19. ;   Backup File Toggle. Toggle through PWB's backup options and let
  20. ;   the user know that something extra is going on.
  21. ;
  22. backup:bak
  23. baknone:=arg "backup:none" assign arg "File backups turned off!" message  \
  24.         arg "bakbak:Ctrl+W" assign
  25. bakbak:=arg "backup:bak" assign arg "Single backups enabled" message  \
  26.         arg "bakundel:Ctrl+W" assign
  27. bakundel:= arg "backup:undel" assign arg "Multiple backups enabled" message  \
  28.         arg "baknone:Ctrl+W" assign
  29. bakundel:Ctrl+W
  30.  
  31. ;
  32. ;   Beginning of Line
  33. ;
  34. beginning_of_line:=meta begline
  35. beginning_of_line:Home
  36.  
  37. ;
  38. ;   Buffer List
  39. ;
  40. Information:Alt+B
  41.  
  42. ;
  43. ;   Case Sensitivity Toggle
  44. ;
  45. case:yes
  46. caseon:=arg "case:" assign arg "Enabled Case Sensitivity" message  \
  47.         arg "caseoff:ctrl+f5" assign
  48. caseoff:=arg "nocase:" assign arg "Disabled Case Sensitivity" message  \
  49.         arg "caseon:ctrl+f5" assign
  50. caseoff:ctrl+f5
  51.  
  52. ;
  53. ;   Center Line Horizontally
  54. ;   Center Line in Window.
  55. ;
  56. center:= arg "Please load the txtfmt extension" message
  57. center:Ctrl+C
  58.  
  59. ;
  60. ;   Change Output File
  61. ;
  62. output_file:=arg arg "New Output File Name" prompt ->can setfile => :>can cancel
  63. output_file:Alt+O
  64.  
  65. ;
  66. ;   Change Window
  67. ;
  68. Window:F2
  69.  
  70. ;
  71. ;   Color.  To set colors in the PWB, assign a new value to one of the
  72. ;   following switches. The value is a two digit hex number where the
  73. ;   first digit is the background color and the second is the foreground.
  74. ;   The number to color mapping is the same as in Brief.  The color change
  75. ;   will not take effect until you restart the editor.  To see an immediate
  76. ;   change, mark (select) the color assignment lines and press Alt+=.
  77. ;
  78. colour:=ToolsIni begfile arg "colour:=ToolsIni" psearch up up up up up up up
  79. color:text 07
  80. color:selection 70
  81. color:highlight 02
  82. color:info 06
  83. color:border 07
  84.  
  85. ;
  86. ;   Compile Buffer.  Compile command is set with the 'build' switch
  87. ;   (see documentation).
  88. ;
  89. compile_it:=Arg Compile
  90. compile_it:Alt+F10
  91.  
  92. ;
  93. ;   Create Key Assignment
  94. ;
  95. assign_to_key:=arg "<assign>" setfile
  96.  
  97. ;
  98. ;   Create Window.  Window handling is very different in the PWB.
  99. ;
  100. ;   To create a new window, move the cursor to the line or column where
  101. ;   the new border is to be placed and do:
  102. ;
  103. ;               Alt+A F3        - to create a horizontal border
  104. ;               Alt+A Alt+A F3  - to create a vertical border
  105. ;
  106. ;   To change the current window, press F3.
  107. ;
  108. ;   To delete an existing window, go to that window and press F4.
  109. ;
  110. create_edge:=ToolsIni begfile arg "create_edge:=" psearch  \
  111.         mpara arg setwindow  \
  112.         arg "window:F3" assign
  113. create_edge:F3
  114.  
  115. ;
  116. ;   Cut to Scrap.  Doesn't take current line if nothing is selected.
  117. ;
  118. delete:num-
  119.  
  120. ;
  121. ;   Delete
  122. ;
  123. clear:=meta delete
  124. clear:del
  125.  
  126. ;
  127. ;   Delete Current Buffer
  128. ;
  129. delete_curr_buffer:=arg refresh
  130. delete_curr_buffer:Ctrl+-
  131.  
  132. ;
  133. ;   Delete Line.
  134. ;
  135. line_delete:=meta ldelete
  136. line_delete:Alt+D
  137.  
  138. ;
  139. ;   Delete Macro File
  140. ;
  141. NotBrief:Shift+F9
  142.  
  143. ;
  144. ;   Delete Next Word
  145. ;
  146. delete_next_word:=Arg Pword Clear
  147.  
  148. ;
  149. ;   Delete Previous Word
  150. ;
  151. delete_previous_word:=Pword Arg Mword Clear
  152. delete_previous_word:Ctrl+Bksp
  153.  
  154. ;
  155. ;   Delete to End of Line
  156. ;
  157. delete_to_eol:=arg ldelete
  158. delete_to_eol:Alt+K
  159.  
  160. ;
  161. ;   Delete Window
  162. ;
  163. delete_edge:=meta window
  164. delete_edge:F4
  165.  
  166. ;
  167. ;   Display File Name
  168. ;
  169. display_file_name:=arg curfile message
  170. display_file_name:Alt+F
  171.  
  172. ;
  173. ;   Display version ID
  174. ;
  175. version:=arg "Microsoft Programmer's WorkBench Version 1.10" message
  176. version:Alt+V
  177.  
  178. ;
  179. ;   EditFile
  180. ;
  181. EditFile:=arg "Name of File to Edit" prompt ->can setfile => :>can cancel
  182. EditFile:Alt+E
  183.  
  184. ;
  185. ;   End of Buffer
  186. ;
  187. endfile:Ctrl+Pgdn
  188.  
  189. ;
  190. ;   End of Window
  191. ;
  192. end_of_window:=meta down
  193. end_of_window:Ctrl+End
  194.  
  195. ;
  196. ;   Execute Command.  In the PWB, you can enter any series of functions or
  197. ;   macros, including string literals "in quotes".
  198. ;
  199. execute_macro:=arg "Command to Execute" prompt ->can execute => :>can cancel
  200. execute_macro:F10
  201.  
  202. ;
  203. ;   Exit
  204. ;
  205. exit:Alt+X
  206.  
  207. ;
  208. ;   Go to Line
  209. ;
  210. GoTo:=arg "Line to Go To" prompt ->can mark => :>can cancel
  211. GoTo:alt+g
  212.  
  213. ;
  214. ;   Go to routine.
  215. ;
  216. routines:=arg "Please load the Browser" message
  217. routines:Ctrl+G
  218.  
  219. ;
  220. ;   Incremental Search
  221. ;
  222. i_search:=NotBrief
  223.  
  224. ;
  225. ;   Insert Mode Toggle.  Toggle between Insert and Overstrike modes and issue
  226. ;   a message telling the user what has been done.
  227. ;
  228. enterinsmode:yes
  229. insert_mode:=Insertmode +>showins arg "Overstrike Mode" message =>  \
  230.                        :>showins arg "Insert Mode" message
  231. insert_mode:Alt+I
  232.  
  233. ;
  234. ;   Left Side of Window
  235. ;
  236. left_side:=meta left
  237. left_side:Shift+Home
  238.  
  239. ;
  240. ;   Line to Bottom of Window
  241. ;
  242. l2b:=meta begline arg setwindow mpage plines meta down
  243. l2b:Ctrl+B
  244.  
  245. ;
  246. ;   Line to Top of Window
  247. ;
  248. l2t:=meta begline arg setwindow
  249. l2t:Ctrl+T
  250.  
  251. ;
  252. ;   Load Macro File
  253. ;
  254. ; NotBrief:F9
  255.  
  256. ;
  257. ;   Lower Case Block
  258. ;
  259. tolower:= arg "Please load the txtfmt extension" message
  260.  
  261. ;
  262. ;   Mark.  Known in the PWB as selecting text.    In the PWB, selection is
  263. ;   done in one of three modes: stream, box and line, which correspond
  264. ;   to normal and column/line selection in Brief.  To select lines,
  265. ;   start marking in column mode, but move straight down. To change
  266. ;   between modes in the PWB, a toggle function <selmode> is provided.
  267. ;
  268. ; Arg:Alt+A               ; PWB selection (default assignment)
  269.  
  270. SelMode:Ctrl+B               ; PWB mode toggle
  271. ToStream:=:>top SelMode ->top       ; Change to stream mode
  272. ToBox:=ToStream SelMode        ; Change to box mode
  273. ToLine:=ToBox SelMode           ; Change to line mode
  274.  
  275. mark2:=ToBox Arg
  276. mark2:Alt+C
  277. mark2:Alt+L
  278.  
  279. mark1:=ToStream Arg
  280. mark1:Alt+M
  281.  
  282. ;
  283. ;   Next Buffer
  284. ;
  285. setfile:Alt+N
  286.  
  287. ;
  288. ;   Next Character
  289. ;
  290. next_char:= arg arg "[~ ]" psearch
  291.  
  292. ;
  293. ;   Next Error
  294. ;
  295. NextMsg:Ctrl+N
  296.  
  297. ;
  298. ;   Open New Line
  299. ;
  300. open_line:=down linsert meta begline
  301. open_line:Ctrl+Enter
  302.  
  303. ;
  304. ;   Paste From Scrap
  305. ;
  306. paste:ins
  307.  
  308. ;
  309. ;   Pause Recording Toggle
  310. ;
  311. NotBrief:Shift+F7
  312.  
  313. ;
  314. ;   Pause On Error
  315. ;
  316. pause_on_error:=NotBrief
  317.  
  318. ;
  319. ;   PlayBack
  320. ;
  321. recordvalue:=arg "No recording has been made" message
  322. recordvalue:F8
  323.  
  324. ;
  325. ;   Pop-up Errors.  In the PWB, this switches you to the compile file.    You
  326. ;   can go to any message with Alt+A Alt+A NextMsg.
  327. ;
  328. next_error1:=arg "<compile>" setfile
  329. next_error1:Ctrl+P
  330.  
  331. ;
  332. ;   Previous Buffer.  There are no "next" and "previous" buffers in the PWB,
  333. ;   so this is the same as "Next Buffer".
  334. ;
  335. setfile:Alt+-
  336.  
  337. ;
  338. ;   Previous Character
  339. ;
  340. prev_char:= arg arg "[~ ]" msearch
  341.  
  342. ;
  343. ;   Print Block
  344. ;
  345. print:Alt+P
  346.  
  347. ;
  348. ;   Quote
  349. ;
  350. quote:Alt+Q
  351.  
  352. ;
  353. ;   Read File into Buffer
  354. ;
  355. read_file:=arg arg "Name of File Read" prompt ->can paste => :>can cancel
  356.  
  357. ;
  358. ;   Reformat Paragraph
  359. ;
  360. reform:= arg "Please load the txtfmt extension" message
  361.  
  362. ;
  363. ;   Regular Expression Toggle.    In the PWB, regular expression recognition
  364. ;   is controlled by modifying the search and search/replace functions
  365. ;   (Arg Arg forces regular expression search).
  366. ;
  367. toggle_re:=togRE arg "togRE:=" srchname assign
  368. toggle_re:Ctrl+F6
  369. togRE:=REon
  370.  
  371. REoff:=arg "psrch:=arg \"String to Search for\" prompt ->can psearch => :>can cancel" assign  \
  372.         arg "msrch:=arg \"String to Search for\" prompt ->can msearch => :>can cancel" assign  \
  373.         arg "qrepl:=qreplace" assign  \
  374.         arg "srchname:=\"REon\"" assign  \
  375.         arg "Disabled Regular Expressions" message
  376. REon:=arg "psrch:=arg arg \"String to Search for\" prompt ->can psearch => :>can cancel" assign  \
  377.         arg "msrch:=arg arg \"String to Search for\" prompt ->can msearch => :>can cancel" assign  \
  378.         arg "qrepl:=arg arg qreplace" assign  \
  379.         arg "srchname:=\"REoff\"" assign  \
  380.         arg "Enabled Regular Expressions" message
  381.  
  382. ;
  383. ;   Remember.  Use Arg Arg Record to append to existing macro.
  384. ;
  385. record:F7
  386.  
  387. ;
  388. ;   Repeat
  389. ;
  390. repeat:Ctrl+R
  391.  
  392. ;
  393. ;   Right Side of Window
  394. ;
  395. right_side:=meta right
  396. right_side:Shift+End
  397.  
  398. ;
  399. ;   Scroll Buffer Down in Window
  400. ;
  401. mlines:Ctrl+D
  402.  
  403. ;
  404. ;   Scroll Buffer Up in Window
  405. ;
  406. plines:Ctrl+U
  407.  
  408. ;
  409. ;   Search Again
  410. ;
  411. search_again:=psearch
  412. search_again:Shift+F5
  413.  
  414. ;
  415. ;   Search Backward
  416. ;
  417. search_back:=msrch arg "search_again:=msearch" assign
  418. search_back:Alt+F5
  419.  
  420. ;
  421. ;   Search Forward
  422. ;
  423. search_fwd:=psrch arg "search_again:=psearch" assign
  424. search_fwd:F5
  425. search_fwd:Alt+S
  426.  
  427. ;
  428. ;   Suspend Editor
  429. ;
  430. shell:Alt+Z
  431.  
  432. ;
  433. ;   Tab.  Please read the documentation for a full description of tabs.
  434. ;
  435. graphic:tab
  436. realtabs:yes
  437. entab:0
  438. tabstops:8
  439.  
  440. ;
  441. ;   Tab Stops
  442. ;
  443. tabs:= arg "Please load the txtfmt extension" message
  444.  
  445. ;
  446. ;   Top of Buffer
  447. ;
  448. begfile:Ctrl+PgUp
  449.  
  450. ;
  451. ;   Top of Window
  452. ;
  453. top_of_window:=meta up
  454. top_of_window:Ctrl+Home
  455.  
  456. ;
  457. ;   Translate Again
  458. ;
  459. translate_again:=qrepl
  460. translate_again:Shift+F6
  461.  
  462. ;
  463. ;   Translate Backward
  464. ;
  465. translate_back:=arg "You can only translate forwards" message
  466. translate_back:Alt+F6
  467.  
  468. ;
  469. ;   Translate Forward
  470. ;
  471. translate:=qrepl
  472. translate:F6
  473. translate:Alt+T
  474.  
  475. ;
  476. ;   Undo
  477. ;
  478. undo:Alt+U
  479. undo:num*
  480.  
  481. ;
  482. ;   Use Tab Characters
  483. ;
  484. use_tab_char:=arg "entab:1" assign
  485.  
  486. ;
  487. ;   Window Border Toggle.  In the PWB, this cycles through the five
  488. ;   possible border states.
  489. ;
  490. winstyle:Alt+F1
  491.  
  492. ;
  493. ;
  494. ;   Write
  495. ;
  496. write_it:=arg arg setfile
  497. write_it:Alt+W
  498.  
  499. ;
  500. ; BRIEF is a trademark of UnderWare, INC.
  501.  
  502.  
  503. [pwb-pwbhelp brief-pwbhelp b-pwbhelp]
  504.  
  505. ;
  506. ;   Help.  Attach context-sensitive help to Alt+H.
  507. ;
  508. _pwbhelp_context:Alt+H
  509.  
  510.  
  511. [pwb-pwbrowse brief-pwbrowse b-pwbrowse]
  512.  
  513. ;
  514. ;  Browser.
  515. ;
  516.  
  517. routines:= pwbrowse1stdef
  518.  
  519. [pwb-txtfmt brief-txtfmt b-txtfmt]
  520.  
  521. center:= CenterLine
  522. tolower:= lcase
  523. reform:= justify
  524. tabs:= ptab
  525.